**********************************************************************************************************************************************
**********************************************************************************************************************************************
*Replication code for "Determining the credibility of commitments in international climate policy" by
*D. Victor, M. Lumkowsky, A. Dannenberg
**********************************************************************************************************************************************
**********************************************************************************************************************************************

*Settings***********************************************************************

version 15.1
discard
global MY_PATH_IN	"" // Enter path where data set is saved. 
global LOG_FILE 	"" // Enter path to save log-file. 
global LOG  ${LOG_FILE}Main_Text_Analysis.log
capture log close
log using "${LOG}", text replace
set more off
clear

********************************************************************************
*Use prepared data set**********************************************************

use "${MY_PATH_IN}03_SI_DATA.dta" 

********************************************************************************
*Set globals********************************************************************

global geopolitical i.NEU_OECD i.NEU_NOECD c.GDP_PPP_PC_2019_std c.CO2_PC_2019_std

global socio i.IPCC c.g6_std i.g5_DUMMY_NATIONAL

global vulnerability c.ND_INDEX_2018_rev_std

global vulnerability_burke c.Burke_Vul_std

global damage_home i.f2_DUMMY_REV

global credibility_lp lse_laws_2016_2020_std lse_policy_2016_2020_std

global ambition_self i.d1_10_DUMMY

global ambition_objective c.PONT_NDC_REV_std

global fossil c.sum_rents_std

global fossil_2 c.SHARE_COAL_2018_std c.SHARE_OIL_2018_std c.SHARE_GAS_2018_std 

global fossil_3 c.COAL_std c.OIL_std c.GAS_std 

global fossil_4 c.COAL_PC_std c.OIL_PC_std c.GAS_PC_std 

global institutions c.Quality_Institutions_std c.POLITY_std

********************************************************************************
*Table S1***********************************************************************

tab IPCC

sum age 
sum age if IPCC == 0
sum age if IPCC == 1

sum g6 
sum g6 if IPCC == 0
sum g6 if IPCC == 1

sum g7 
sum g7 if IPCC == 0
sum g7 if IPCC == 1

tab g1 
tab g1 if IPCC == 0 
tab g1 if IPCC == 1

tab g5_2 
tab g5_2 if IPCC == 0
tab g5_2 if IPCC == 1

tab g4 
tab g4 if IPCC == 0 
tab g4 if IPCC == 1

tab continent 
tab continent if IPCC == 0 
tab continent if IPCC == 1

tab OECD_CAT
tab OECD_CAT if IPCC == 0 
tab OECD_CAT if IPCC == 1

********************************************************************************
*Table S2***********************************************************************

tab d2_10 if OECD_CAT == 1
tab d2_10 if OECD_CAT == 3
tab d2_10 if OECD_CAT == 2
tab d2_10 if OECD_CAT == 4
tab d2_10 if OECD_CAT == 5
tab d2_10 if OECD_CAT == 6

tab d2_10 if OECD_CAT == 1 & IPCC == 0
tab d2_10 if OECD_CAT == 3 & IPCC == 0
tab d2_10 if OECD_CAT == 2 & IPCC == 0
tab d2_10 if OECD_CAT == 4 & IPCC == 0
tab d2_10 if OECD_CAT == 5 & IPCC == 0
tab d2_10 if OECD_CAT == 6 & IPCC == 0

tab d2_10 if OECD_CAT == 1 & IPCC == 1
tab d2_10 if OECD_CAT == 3 & IPCC == 1
tab d2_10 if OECD_CAT == 2 & IPCC == 1
tab d2_10 if OECD_CAT == 4 & IPCC == 1
tab d2_10 if OECD_CAT == 5 & IPCC == 1
tab d2_10 if OECD_CAT == 6 & IPCC == 1

********************************************************************************
*Table S3***********************************************************************

sum d2_10 if OECD_CAT == 1
sum d2_10 if OECD_CAT == 3
sum d2_10 if OECD_CAT == 2
sum d2_10 if OECD_CAT == 4
sum d2_10 if OECD_CAT == 5
sum d2_10 if OECD_CAT == 6

sum d2_10 if OECD_CAT == 1 & IPCC == 0
sum d2_10 if OECD_CAT == 3 & IPCC == 0
sum d2_10 if OECD_CAT == 2 & IPCC == 0
sum d2_10 if OECD_CAT == 4 & IPCC == 0
sum d2_10 if OECD_CAT == 5 & IPCC == 0
sum d2_10 if OECD_CAT == 6 & IPCC == 0

sum d2_10 if OECD_CAT == 1 & IPCC == 1
sum d2_10 if OECD_CAT == 3 & IPCC == 1
sum d2_10 if OECD_CAT == 2 & IPCC == 1
sum d2_10 if OECD_CAT == 4 & IPCC == 1
sum d2_10 if OECD_CAT == 5 & IPCC == 1
sum d2_10 if OECD_CAT == 6 & IPCC == 1

********************************************************************************
*Table S4***********************************************************************

ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 3), by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 2), by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 4), by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 5), by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 6), by(OECD_CAT)

ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 3) & IPCC == 0, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 2) & IPCC == 0, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 4) & IPCC == 0, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 5) & IPCC == 0, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 6) & IPCC == 0, by(OECD_CAT)

ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 3) & IPCC == 1, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 2) & IPCC == 1, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 4) & IPCC == 1, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 5) & IPCC == 1, by(OECD_CAT)
ranksum d2_10 if (OECD_CAT == 1 | OECD_CAT == 6) & IPCC == 1, by(OECD_CAT)

********************************************************************************
*Table S5***********************************************************************

tab d1_10 if OECD_CAT == 1
tab d1_10 if OECD_CAT == 3
tab d1_10 if OECD_CAT == 2
tab d1_10 if OECD_CAT == 4
tab d1_10 if OECD_CAT == 5
tab d1_10 if OECD_CAT == 6

tab d1_10 if OECD_CAT == 1 & IPCC == 0
tab d1_10 if OECD_CAT == 3 & IPCC == 0
tab d1_10 if OECD_CAT == 2 & IPCC == 0
tab d1_10 if OECD_CAT == 4 & IPCC == 0
tab d1_10 if OECD_CAT == 5 & IPCC == 0
tab d1_10 if OECD_CAT == 6 & IPCC == 0

tab d1_10 if OECD_CAT == 1 & IPCC == 1
tab d1_10 if OECD_CAT == 3 & IPCC == 1
tab d1_10 if OECD_CAT == 2 & IPCC == 1
tab d1_10 if OECD_CAT == 4 & IPCC == 1
tab d1_10 if OECD_CAT == 5 & IPCC == 1
tab d1_10 if OECD_CAT == 6 & IPCC == 1

********************************************************************************
*Table S6***********************************************************************

sum d1_10 if OECD_CAT == 1
sum d1_10 if OECD_CAT == 3
sum d1_10 if OECD_CAT == 2
sum d1_10 if OECD_CAT == 4
sum d1_10 if OECD_CAT == 5
sum d1_10 if OECD_CAT == 6

sum d1_10 if OECD_CAT == 1 & IPCC == 0
sum d1_10 if OECD_CAT == 3 & IPCC == 0
sum d1_10 if OECD_CAT == 2 & IPCC == 0
sum d1_10 if OECD_CAT == 4 & IPCC == 0
sum d1_10 if OECD_CAT == 5 & IPCC == 0
sum d1_10 if OECD_CAT == 6 & IPCC == 0

sum d1_10 if OECD_CAT == 1 & IPCC == 1
sum d1_10 if OECD_CAT == 3 & IPCC == 1
sum d1_10 if OECD_CAT == 2 & IPCC == 1
sum d1_10 if OECD_CAT == 4 & IPCC == 1
sum d1_10 if OECD_CAT == 5 & IPCC == 1
sum d1_10 if OECD_CAT == 6 & IPCC == 1

********************************************************************************
*Table S7***********************************************************************

ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 3), by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 2), by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 4), by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 5), by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 6), by(OECD_CAT)

ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 3) & IPCC == 0, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 2) & IPCC == 0, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 4) & IPCC == 0, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 5) & IPCC == 0, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 6) & IPCC == 0, by(OECD_CAT)

ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 3) & IPCC == 1, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 2) & IPCC == 1, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 4) & IPCC == 1, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 5) & IPCC == 1, by(OECD_CAT)
ranksum d1_10 if (OECD_CAT == 1 | OECD_CAT == 6) & IPCC == 1, by(OECD_CAT)

********************************************************************************
*Table S8***********************************************************************

tab d2_1 if home_country != "Australia"
tab d2_2 if home_country != "Brazil"
tab d2_3 if home_country != "China"
tab d2_4 if EU_27 != 1
tab d2_5 if home_country != "India"
tab d2_6 if home_country != "Russia"
tab d2_7 if home_country != "Saudi Arabia"
tab d2_8 if home_country != "South Africa"
tab d2_9 if home_country != "USA"
 
tab d2_1 if home_country != "Australia" & IPCC == 0
tab d2_2 if home_country != "Brazil" & IPCC == 0
tab d2_3 if home_country != "China" & IPCC == 0
tab d2_4 if EU_27 != 1 & IPCC == 0
tab d2_5 if home_country != "India" & IPCC == 0
tab d2_6 if home_country != "Russia" & IPCC == 0
tab d2_7 if home_country != "Saudi Arabia" & IPCC == 0
tab d2_8 if home_country != "South Africa" & IPCC == 0
tab d2_9 if home_country != "USA" & IPCC == 0
 
tab d2_1 if home_country != "Australia" & IPCC == 1
tab d2_2 if home_country != "Brazil" & IPCC == 1
tab d2_3 if home_country != "China" & IPCC == 1
tab d2_4 if EU_27 != 1 & IPCC == 1
tab d2_5 if home_country != "India" & IPCC == 1
tab d2_6 if home_country != "Russia" & IPCC == 1
tab d2_7 if home_country != "Saudi Arabia" & IPCC == 1
tab d2_8 if home_country != "South Africa" & IPCC == 1
tab d2_9 if home_country != "USA" & IPCC == 1

********************************************************************************
*Table S9***********************************************************************

sum d2_1 if home_country != "Australia"
sum d2_2 if home_country != "Brazil"
sum d2_3 if home_country != "China"
sum d2_4 if EU_27 != 1
sum d2_5 if home_country != "India"
sum d2_6 if home_country != "Russia"
sum d2_7 if home_country != "Saudi Arabia"
sum d2_8 if home_country != "South Africa"
sum d2_9 if home_country != "USA"
 
sum d2_1 if home_country != "Australia" & IPCC == 0
sum d2_2 if home_country != "Brazil" & IPCC == 0
sum d2_3 if home_country != "China" & IPCC == 0
sum d2_4 if EU_27 != 1 & IPCC == 0
sum d2_5 if home_country != "India" & IPCC == 0
sum d2_6 if home_country != "Russia" & IPCC == 0
sum d2_7 if home_country != "Saudi Arabia" & IPCC == 0
sum d2_8 if home_country != "South Africa" & IPCC == 0
sum d2_9 if home_country != "USA" & IPCC == 0
 
sum d2_1 if home_country != "Australia" & IPCC == 1
sum d2_2 if home_country != "Brazil" & IPCC == 1
sum d2_3 if home_country != "China" & IPCC == 1
sum d2_4 if EU_27 != 1 & IPCC == 1
sum d2_5 if home_country != "India" & IPCC == 1
sum d2_6 if home_country != "Russia" & IPCC == 1
sum d2_7 if home_country != "Saudi Arabia" & IPCC == 1
sum d2_8 if home_country != "South Africa" & IPCC == 1
sum d2_9 if home_country != "USA" & IPCC == 1

********************************************************************************
*Table S10**********************************************************************

signrank d2_woh_4 = d2_woh_1
signrank d2_woh_4 = d2_woh_2
signrank d2_woh_4 = d2_woh_3
signrank d2_woh_4 = d2_woh_5
signrank d2_woh_4 = d2_woh_6
signrank d2_woh_4 = d2_woh_7
signrank d2_woh_4 = d2_woh_8
signrank d2_woh_4 = d2_woh_9

signrank d2_woh_4 = d2_woh_1 if IPCC == 0
signrank d2_woh_4 = d2_woh_2 if IPCC == 0
signrank d2_woh_4 = d2_woh_3 if IPCC == 0
signrank d2_woh_4 = d2_woh_5 if IPCC == 0
signrank d2_woh_4 = d2_woh_6 if IPCC == 0
signrank d2_woh_4 = d2_woh_7 if IPCC == 0
signrank d2_woh_4 = d2_woh_8 if IPCC == 0
signrank d2_woh_4 = d2_woh_9 if IPCC == 0

signrank d2_woh_4 = d2_woh_1 if IPCC == 1
signrank d2_woh_4 = d2_woh_2 if IPCC == 1
signrank d2_woh_4 = d2_woh_3 if IPCC == 1
signrank d2_woh_4 = d2_woh_5 if IPCC == 1
signrank d2_woh_4 = d2_woh_6 if IPCC == 1
signrank d2_woh_4 = d2_woh_7 if IPCC == 1
signrank d2_woh_4 = d2_woh_8 if IPCC == 1
signrank d2_woh_4 = d2_woh_9 if IPCC == 1

********************************************************************************
*Table S11***********************************************************************

tab d1_1 if home_country != "Australia"
tab d1_2 if home_country != "Brazil"
tab d1_3 if home_country != "China"
tab d1_4 if EU_27 != 1
tab d1_5 if home_country != "India"
tab d1_6 if home_country != "Russia"
tab d1_7 if home_country != "Saudi Arabia"
tab d1_8 if home_country != "South Africa"
tab d1_9 if home_country != "USA"
 
tab d1_1 if home_country != "Australia" & IPCC == 0
tab d1_2 if home_country != "Brazil" & IPCC == 0
tab d1_3 if home_country != "China" & IPCC == 0
tab d1_4 if EU_27 != 1 & IPCC == 0
tab d1_5 if home_country != "India" & IPCC == 0
tab d1_6 if home_country != "Russia" & IPCC == 0
tab d1_7 if home_country != "Saudi Arabia" & IPCC == 0
tab d1_8 if home_country != "South Africa" & IPCC == 0
tab d1_9 if home_country != "USA" & IPCC == 0
 
tab d1_1 if home_country != "Australia" & IPCC == 1
tab d1_2 if home_country != "Brazil" & IPCC == 1
tab d1_3 if home_country != "China" & IPCC == 1
tab d1_4 if EU_27 != 1 & IPCC == 1
tab d1_5 if home_country != "India" & IPCC == 1
tab d1_6 if home_country != "Russia" & IPCC == 1
tab d1_7 if home_country != "Saudi Arabia" & IPCC == 1
tab d1_8 if home_country != "South Africa" & IPCC == 1
tab d1_9 if home_country != "USA" & IPCC == 1

********************************************************************************
*Table S12***********************************************************************

sum d1_1 if home_country != "Australia"
sum d1_2 if home_country != "Brazil"
sum d1_3 if home_country != "China"
sum d1_4 if EU_27 != 1
sum d1_5 if home_country != "India"
sum d1_6 if home_country != "Russia"
sum d1_7 if home_country != "Saudi Arabia"
sum d1_8 if home_country != "South Africa"
sum d1_9 if home_country != "USA"
 
sum d1_1 if home_country != "Australia" & IPCC == 0
sum d1_2 if home_country != "Brazil" & IPCC == 0
sum d1_3 if home_country != "China" & IPCC == 0
sum d1_4 if EU_27 != 1 & IPCC == 0
sum d1_5 if home_country != "India" & IPCC == 0
sum d1_6 if home_country != "Russia" & IPCC == 0
sum d1_7 if home_country != "Saudi Arabia" & IPCC == 0
sum d1_8 if home_country != "South Africa" & IPCC == 0
sum d1_9 if home_country != "USA" & IPCC == 0
 
sum d1_1 if home_country != "Australia" & IPCC == 1
sum d1_2 if home_country != "Brazil" & IPCC == 1
sum d1_3 if home_country != "China" & IPCC == 1
sum d1_4 if EU_27 != 1 & IPCC == 1
sum d1_5 if home_country != "India" & IPCC == 1
sum d1_6 if home_country != "Russia" & IPCC == 1
sum d1_7 if home_country != "Saudi Arabia" & IPCC == 1
sum d1_8 if home_country != "South Africa" & IPCC == 1
sum d1_9 if home_country != "USA" & IPCC == 1

********************************************************************************
*Table S13**********************************************************************

signrank d1_woh_4 = d1_woh_1
signrank d1_woh_4 = d1_woh_2
signrank d1_woh_4 = d1_woh_3
signrank d1_woh_4 = d1_woh_5
signrank d1_woh_4 = d1_woh_6
signrank d1_woh_4 = d1_woh_7
signrank d1_woh_4 = d1_woh_8
signrank d1_woh_4 = d1_woh_9

signrank d1_woh_4 = d1_woh_1 if IPCC == 0
signrank d1_woh_4 = d1_woh_2 if IPCC == 0
signrank d1_woh_4 = d1_woh_3 if IPCC == 0
signrank d1_woh_4 = d1_woh_5 if IPCC == 0
signrank d1_woh_4 = d1_woh_6 if IPCC == 0
signrank d1_woh_4 = d1_woh_7 if IPCC == 0
signrank d1_woh_4 = d1_woh_8 if IPCC == 0
signrank d1_woh_4 = d1_woh_9 if IPCC == 0

signrank d1_woh_4 = d1_woh_1 if IPCC == 1
signrank d1_woh_4 = d1_woh_2 if IPCC == 1
signrank d1_woh_4 = d1_woh_3 if IPCC == 1
signrank d1_woh_4 = d1_woh_5 if IPCC == 1
signrank d1_woh_4 = d1_woh_6 if IPCC == 1
signrank d1_woh_4 = d1_woh_7 if IPCC == 1
signrank d1_woh_4 = d1_woh_8 if IPCC == 1
signrank d1_woh_4 = d1_woh_9 if IPCC == 1

********************************************************************************
*Table S14**********************************************************************

probit d2_1_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Australia", vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_2_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Brazil", vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_3_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "China", vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_4_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if EU_27 != 1, vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_5_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "India", vce(robust)
margins, dydx(IPCC) atmeans post

********************************************************************************
*Table S15**********************************************************************

probit d2_6_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Russia", vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_7_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Saudi Arabia", vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_8_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "South Africa", vce(robust)
margins, dydx(IPCC) atmeans post

probit d2_9_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "USA", vce(robust)
margins, dydx(IPCC) atmeans post

********************************************************************************
*Table S16**********************************************************************

probit d1_1_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Australia", vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_2_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Brazil", vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_3_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "China", vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_4_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if EU_27 != 1, vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_5_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "India", vce(robust)
margins, dydx(IPCC) atmeans post

********************************************************************************
*Table S17**********************************************************************

probit d1_6_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Russia", vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_7_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "Saudi Arabia", vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_8_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "South Africa", vce(robust)
margins, dydx(IPCC) atmeans post

probit d1_9_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio if home_country != "USA", vce(robust)
margins, dydx(IPCC) atmeans post

********************************************************************************
*Table S22**********************************************************************

estpost tabstat d2_10_DUMMY EU_OECD NEU_OECD NEU_NOECD GDP_PPP_PC_2019 d1_10_DUMMY PONT_NDC_REV f2_DUMMY_REV ND_INDEX_2018_rev ///
Quality_Institutions POLITY sum_rents CO2_PC_2019 IPCC g4_DUMMY_NATSCI g6 g5_DUMMY_NATIONAL, statistics(count mean sd min max) columns(statistics) 

********************************************************************************
*Table S23**********************************************************************

estpost tabstat d2_10_DUMMY EU_OECD NEU_OECD NEU_NOECD GDP_PPP_PC_2019 d1_10_DUMMY PONT_NDC_REV f2_DUMMY_REV ND_INDEX_2018_rev ///
Quality_Institutions POLITY sum_rents CO2_PC_2019 g4_DUMMY_NATSCI g6 g5_DUMMY_NATIONAL if IPCC == 0, statistics(count mean sd min max) columns(statistics) 

estpost tabstat d2_10_DUMMY EU_OECD NEU_OECD NEU_NOECD GDP_PPP_PC_2019 d1_10_DUMMY PONT_NDC_REV f2_DUMMY_REV ND_INDEX_2018_rev ///
Quality_Institutions POLITY sum_rents CO2_PC_2019 g4_DUMMY_NATSCI g6 g5_DUMMY_NATIONAL if IPCC == 1, statistics(count mean sd min max) columns(statistics) 

********************************************************************************
*Table S24**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $damage_home $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective $vulnerability $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $vulnerability $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S25**********************************************************************

probit d2_10_DUMMY c.GDP_PPP_PC_2019_std c.CO2_PC_2019_std $ambition_self c.POLITY_std $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.GDP_PPP_PC_2019_std c.CO2_PC_2019_std i.d1_10_DUMMY c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.CO2_PC_2019_std i.d1_10_DUMMY c.Quality_Institutions_std c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.CO2_PC_2019_std i.d1_10_DUMMY c.ND_INDEX_2018_rev_std c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.GDP_PPP_PC_2019_std c.CO2_PC_2019_std i.d1_10_DUMMY c.Quality_Institutions_std c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.CO2_PC_2019_std i.d1_10_DUMMY c.ND_INDEX_2018_rev_std c.Quality_Institutions_std c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.GDP_PPP_PC_2019_std c.CO2_PC_2019_std i.d1_10_DUMMY c.ND_INDEX_2018_rev_std c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY i.NEU_OECD i.NEU_NOECD c.GDP_PPP_PC_2019_std c.CO2_PC_2019_std i.d1_10_DUMMY c.ND_INDEX_2018_rev_std c.Quality_Institutions_std c.POLITY_std c.sum_rents_std i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S26**********************************************************************

probit d2_10_DUMMY $geopolitical c.PONT_NDC_REV_std $vulnerability $institutions $fossil $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical c.cat_2020_overall_std $vulnerability $institutions $fossil $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical c.ccpi_2020_2030_target_std $vulnerability $institutions $fossil $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical c.PONT_NDC_REV_2_std $vulnerability $institutions $fossil $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical c.cat_2020_overall_2_std $vulnerability $institutions $fossil $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical c.ccpi_2020_2030_target_2_std $vulnerability $institutions $fossil $socio , vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S27**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $credibility_lp $damage_home $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $credibility_lp $damage_home $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective $credibility_lp $vulnerability $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $credibility_lp $vulnerability $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S28***********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $damage_home $institutions $fossil_2 $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil_2 $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective $vulnerability $institutions $fossil_2 $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $vulnerability $institutions $fossil_2 $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S30**********************************************************************

estpost tabstat COAL OIL GAS COAL_PC OIL_PC GAS_PC, statistics(count mean sd min max) columns(statistics) 

********************************************************************************
*Table S31**********************************************************************

estpost tabstat COAL OIL GAS COAL_PC OIL_PC GAS_PC if IPCC == 0, statistics(count mean sd min max) columns(statistics) 

estpost tabstat COAL OIL GAS COAL_PC OIL_PC GAS_PC if IPCC == 1, statistics(count mean sd min max) columns(statistics) 

********************************************************************************
*Table S32**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $damage_home $institutions $fossil_3 $socio , vce(robust)
margins, dydx(*) atmeans post 

probit d2_10_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil_3 $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective $vulnerability $institutions $fossil_3 $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $vulnerability $institutions $fossil_3 $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S33**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $damage_home $institutions $fossil_4 $socio , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil_4 $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective $vulnerability $institutions $fossil_4 $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $vulnerability $institutions $fossil_4 $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S35**********************************************************************

estpost tabstat Burke_Vul ND_VUL_INDEX_2018, statistics(count mean sd min max) columns(statistics) 

********************************************************************************
*Table S36**********************************************************************

estpost tabstat Burke_Vul ND_VUL_INDEX_2018 if IPCC == 0, statistics(count mean sd min max) columns(statistics) 
estpost tabstat Burke_Vul ND_VUL_INDEX_2018 if IPCC == 1, statistics(count mean sd min max) columns(statistics) 

********************************************************************************
*Table S37**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $vulnerability_burke $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $vulnerability_burke $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective c.ND_VUL_INDEX_2018_std $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self c.ND_VUL_INDEX_2018_std $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S38**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_objective $damage_home $institutions $fossil $socio i.g4_DUMMY_NATSCI  , vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil $socio i.g4_DUMMY_NATSCI, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_objective $vulnerability $institutions $fossil $socio i.g4_DUMMY_NATSCI, vce(robust)
margins, dydx(*) atmeans post

probit d2_10_DUMMY $geopolitical $ambition_self $vulnerability $institutions $fossil $socio i.g4_DUMMY_NATSCI, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Figure S6**********************************************************************

probit d2_10_DUMMY $geopolitical $ambition_self $damage_home $institutions $fossil c.g6_std i.g5_DUMMY_NATIONAL i.IPCC##i.g4_DUMMY_NATSCI, vce(robust)
margins, over(IPCC) at(g4_DUMMY_NATSCI=(0 1)) post
mlincom, clear

qui mlincom 1, stat(est se p) add rowname("Pr(Compliance): No Nat Science, No IPCC")
qui mlincom 2, stat(est se p) add rowname("Pr(Compliance): No Nat Science, IPCC")
qui mlincom 3, stat(est se p) add rowname("Pr(Compliance): Nat Science, No IPCC")
qui mlincom 4, stat(est se p) add rowname("Pr(Compliance): Nat Science, IPCC")

qui mlincom 1 - 2, stat(est se p) add rowname("AME IPCC: No Nat Science")

qui mlincom 3 - 4, stat(est se p) add rowname("AME IPCC: Nat Science")

qui mlincom (1 - 2) - (3 - 4), stat(est se p) add rowname("2nd Diff") 

mlincom, twidth(20) title("Pr(Compliance) - Interaction Effects of IPCC x Nat Science")

********************************************************************************
*Table S39**********************************************************************

oprobit d2_10 $geopolitical $ambition_objective $damage_home $institutions $fossil $socio, vce(robust)

oprobit d2_10 $geopolitical $ambition_self $damage_home $institutions $fossil $socio, vce(robust)

oprobit d2_10 $geopolitical $ambition_objective $vulnerability $institutions $fossil $socio, vce(robust)

oprobit d2_10 $geopolitical $ambition_self $vulnerability $institutions $fossil $socio, vce(robust)


********************************************************************************
*Table S40**********************************************************************

probit d1_10_DUMMY $geopolitical $damage_home $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

probit d1_10_DUMMY $geopolitical $vulnerability $institutions $fossil $socio, vce(robust)
margins, dydx(*) atmeans post

********************************************************************************
*Table S41**********************************************************************

estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if EU_OECD == 1, statistics(mean) columns(variables) 
estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if NEU_OECD == 1, statistics(mean) columns(variables) 
estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if NEU_NOECD == 1, statistics(mean) columns(variables) 

estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if EU_OECD == 1 & IPCC == 0, statistics(mean) columns(variables) 
estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if NEU_OECD == 1 & IPCC == 0, statistics(mean) columns(variables) 
estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if NEU_NOECD == 1 & IPCC == 0, statistics(mean) columns(variables) 

estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if EU_OECD == 1 & IPCC == 1, statistics(mean) columns(variables) 
estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if NEU_OECD == 1 & IPCC == 1, statistics(mean) columns(variables) 
estpost tabstat d5_1 d5_6 d5_7 d5_5 d5_3 d5_2 d5_4 d5_8_n if NEU_NOECD == 1 & IPCC == 1, statistics(mean) columns(variables) 

********************************************************************************
*Table S42**********************************************************************

tab d5_1 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_1 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_6 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_6 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_7 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_7 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_5 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_5 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_3 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_3 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_2 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_2 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_4 EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_4 EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

tab d5_8_n EU_OECD if (EU_OECD == 1 | NEU_OECD == 1),  chi2
tab d5_8_n EU_OECD if (EU_OECD == 1 | NEU_NOECD == 1),  chi2

********************************************************************************
*Table S43**********************************************************************

sum d2_10 if home_country == "USA" & after_07_11 == 1
sum d2_10 if home_country == "USA" & after_07_11 == 0

********************************************************************************
*Table S44**********************************************************************

ranksum d2_10 if home_country == "USA", by(after_07_11)

********************************************************************************
*Table S45**********************************************************************

oprobit d2_10 after_07_11 i.IPCC c.g6_std i.g5_DUMMY_NATIONAL if home_country == "USA", vce(robust)

oprobit d2_10 after_07_11 c.d1_10_std i.IPCC g6_std i.g5_DUMMY_NATIONAL if home_country == "USA", vce(robust)

********************************************************************************
*Table S46**********************************************************************

sum d2_woh_9 if after_07_11 == 1
sum d2_woh_9 if after_07_11 == 0

*Table S48**********************************************************************
********************************************************************************

ranksum d2_woh_9, by(after_07_11)

********************************************************************************
*Table S49**********************************************************************

egen d1_woh_9_std = std(d1_woh_9)

oprobit d2_woh_9 after_07_11 i.IPCC c.g6_std i.g5_DUMMY_NATIONAL, vce(robust)

oprobit d2_woh_9 after_07_11 c.d1_woh_9_std i.IPCC g6_std i.g5_DUMMY_NATIONAL, vce(robust)

********************************************************************************
*Table S49**********************************************************************

sum d1_10 if home_country == "USA" & after_07_11 == 1
sum d1_10 if home_country == "USA" & after_07_11 == 0

********************************************************************************
*Table S50**********************************************************************

ranksum d1_10 if home_country == "USA", by(after_07_11)

********************************************************************************
*Table S51**********************************************************************

sum d1_woh_9 if after_07_11 == 1
sum d1_woh_9 if after_07_11 == 0

********************************************************************************
*Table S52**********************************************************************

ranksum d1_woh_9, by(after_07_11)

********************************************************************************
log close
********************************************************************************
********************************************************************************











